home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / fish / 001-100 / 001-025 / 014 / shell / main.c < prev    next >
C/C++ Source or Header  |  1995-03-17  |  715b  |  48 lines
  1.  
  2. /*
  3.  * MAIN.C
  4.  *
  5.  * Matthew Dillon, 24 Feb 1986
  6.  *
  7.  * el main routine.
  8.  */
  9.  
  10. #include "shell.h"
  11.  
  12. char Inline[256];
  13.  
  14. main(argc, argv)
  15. char *argv[];
  16. {
  17.    char *prompt;
  18.  
  19.    init_vars();
  20.    init();
  21.    strcpy (Inline, "source ");
  22.    strcat (Inline, (argc == 2) ? argv[1] : "sys:.login");
  23.    do_source (Inline, 0);
  24.    for (;;) {
  25.       if ((prompt = get_var (LEVEL_SET, V_PROMPT)) == NULL)
  26.          prompt = "echo -n \"% \"";
  27.       ++H_stack;
  28.       exec_command (prompt);
  29.       --H_stack;
  30.       fflush (stdout);
  31.       if (gets (Inline) == NULL)
  32.          exit (0);
  33.       exec_command (Inline);
  34.    }
  35. }
  36.  
  37. init()
  38. {
  39. }
  40.  
  41. init_vars()
  42. {
  43.    set_var (LEVEL_SET, V_PROMPT, "echo -n \"% \"");
  44.    set_var (LEVEL_SET, V_HIST,   "20");
  45. }
  46.  
  47.  
  48.